home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1996 / MacHack 1996.toast / Hacks / Hacks ’95 / ProcessBar™ / Code / Sources / aevents.c < prev    next >
Encoding:
Text File  |  1995-09-10  |  2.0 KB  |  66 lines  |  [TEXT/MMCC]
  1. // File "aevents.c" -
  2.  
  3. #include "aevents.h"
  4. #include "main.h"
  5. #include "Sample win.h"
  6.  
  7. // ***********************************************************************************
  8. // Global Declarations 
  9.  
  10. extern GlobalsRec glob;
  11.  
  12. // ***********************************************************************************
  13. // ***********************************************************************************
  14.  
  15. pascal short AEHandlerOAPP(AppleEvent *event, AppleEvent *reply, long refCon) {
  16.  
  17.     NewSampleWindow();
  18.  
  19.     return(0);
  20.     }
  21.     
  22. // ***********************************************************************************
  23. // ***********************************************************************************
  24.  
  25. pascal short AEHandlerODOC(AppleEvent *event, AppleEvent *reply, long refCon) {
  26.     
  27.     NewSampleWindow();
  28.     
  29.     return(0);
  30.     }
  31.     
  32. // ***********************************************************************************
  33. // ***********************************************************************************
  34.  
  35. pascal short AEHandlerPDOC(AppleEvent *event, AppleEvent *reply, long refCon) {
  36.  
  37.     return(0);    
  38.     }
  39.     
  40. // ***********************************************************************************
  41. // ***********************************************************************************
  42.  
  43. pascal short AEHandlerQUIT(AppleEvent *event, AppleEvent *reply, long refCon) {
  44.  
  45.     glob.quitting = TRUE;
  46.     return(0);
  47.     }
  48.     
  49. // ***********************************************************************************
  50. // ***********************************************************************************
  51.  
  52. void InitHLEvents() {
  53.     short i, err=0;
  54.     
  55.     err=AEInstallEventHandler(kCoreEventClass, kAEOpenApplication, 
  56.             NewAEEventHandlerProc(AEHandlerOAPP), 0, 0);
  57.     err=AEInstallEventHandler(kCoreEventClass, kAEOpenDocuments, 
  58.             NewAEEventHandlerProc(AEHandlerODOC), 0, 0);
  59.     err=AEInstallEventHandler(kCoreEventClass, kAEPrintDocuments, 
  60.             NewAEEventHandlerProc(AEHandlerPDOC), 0, 0);
  61.     err=AEInstallEventHandler(kCoreEventClass, kAEQuitApplication, 
  62.             NewAEEventHandlerProc(AEHandlerQUIT), 0, 0);
  63.     }
  64.  
  65.  
  66.